home *** CD-ROM | disk | FTP | other *** search
/ Eagles Nest BBS 5 / Eagles_Nest_Mac_Collection_Disc_5.TOAST / Science & Religion / MacAtoms301 / MacAtoms301 / Demo Data / Zoom Movie < prev    next >
Text File  |  1989-12-31  |  929b  |  65 lines
  1. This file demonstrates how one can use the scale command to make a movie
  2. that zooms in towards an atom.  The move command has been added to force
  3. the atom at (-75,-75) to remain fixed as we zoom in.  Only the first
  4. move command is necessary.  The others are redundant and could be
  5. eliminated.  They have been provided just to emphasize the fact that
  6. the offset is in the user coordinate system, so that different offsets
  7. don't need to be provided when the scale factor changes.
  8.  
  9. In a real movie, one would probably add erase commands between frames.
  10.  
  11. *reset
  12. *erase
  13. *move
  14. 75 75 0
  15.  
  16. *atomdefs
  17. 2
  18. 20 65535 0 0
  19. 20 0 16367 0
  20.  
  21. *atoms
  22.  9 
  23. -75 -75 -75  1 
  24. -75  75 -75  1 
  25.  75 -75 -75  1 
  26.  75  75 -75  1 
  27.  0  0  0  2 
  28. -75 -75  75  1 
  29. -75  75  75  1 
  30.  75 -75  75  1 
  31.  75  75  75  1 
  32.  
  33. *scale
  34. 1.1
  35. *move
  36. 75 75 0
  37. *plot
  38.  
  39. *scale
  40. 1.2
  41. *plot
  42.  
  43. *scale
  44. 1.3
  45. *plot
  46.  
  47. *scale
  48. 1.4
  49. 104.5 104.5 0
  50. *plot
  51.  
  52. *scale
  53. 1.5
  54. *move
  55. 75 75 0
  56. *plot
  57.  
  58. *scale
  59. 1.6
  60. *plot
  61.  
  62. *end
  63.  
  64.  
  65.